(eshell-eval-using-options): Add debug declaration.
authorThien-Thi Nguyen <ttn@gnuvola.org>
Sun, 26 Aug 2007 01:51:37 +0000 (01:51 +0000)
committerThien-Thi Nguyen <ttn@gnuvola.org>
Sun, 26 Aug 2007 01:51:37 +0000 (01:51 +0000)
lisp/eshell/esh-opt.el

index 41e12e70b43ccef537d6a5d39bca9ae72e5f3174..121f568a9c42e538fe4cdeeb5ffdfe69eb0d9535 100644 (file)
@@ -58,6 +58,7 @@ BODY-FORMS.  If instead an external command is run, the tag
 
 Lastly, any remaining arguments will be available in a locally
 interned variable `args' (created using a `let' form)."
+  (declare (debug (form form sexp body)))
   `(let ((temp-args
          ,(if (memq ':preserve-args (cadr options))
               macro-args
@@ -101,7 +102,7 @@ This code doesn't really need to be macro expanded everywhere."
                  nil))
           (error "%s" usage-msg))))
       (throw 'eshell-external
-            (eshell-external-command ext-command args))
+             (eshell-external-command ext-command args))
     last-value))
 
 (defun eshell-show-usage (name options)